home *** CD-ROM | disk | FTP | other *** search
/ Ozsi 8 / Ozsi_08_1997_Tide_Side_A.d64 / wriggle rtn (.txt) < prev    next >
Commodore BASIC  |  2023-02-26  |  2KB  |  53 lines
  1. 1 print"[147]":poke53281,10:poke53280,10
  2. 2 print"          [213][195][195][195][178][195][195][195][195][201]  [213][195][195][195][195][178][195][201]"
  3. 3 print"          [194]   [194]    [194]  [194]    [194] [194]"
  4. 4 print"          [194]   [194] [213][195][195][203]  [202][195][195][201] [194] [194]"
  5. 5 print"          [194]   [194] [194]        [194] [194] [194]"
  6. 6 print"          [202][195][195][195][203] [202][195][195][195][195][195][195][195][195][203] [202][195][203]"
  7. 7 print"             readers read              "
  8. 8 print"        >> commodore - scene! <<       "
  9. 9 poke2020,20:poke2021,15:poke2022,13:poke2023,26
  10. 10 fort=49200to49420:reada:poket,a
  11. 20 c=c+a:next:ifc<>32291thengoto40
  12. 30 print"start with sys49200":end
  13. 40 print"data error!check yer data dude";c:end
  14. 100 data32,143,192,120,169,127,141
  15. 110 data13,220,173,13,220,169,27
  16. 120 data141,17,208,169,41,141,18
  17. 130 data208,169,90,141,20,3,169
  18. 140 data192,141,21,3,169,1,141
  19. 150 data25,208,141,26,208,88,96
  20. 160 data162,13,202,208,253,188,0
  21. 170 data207,189,0,206,136,208,253
  22. 180 data141,22,208,141,22,208,232
  23. 190 data224,66,208,236,162,8,202
  24. 200 data208,253,32,216,192,162,146
  25. 210 data236,18,208,208,251,169,200
  26. 220 data141,22,208,169,1,141,25
  27. 230 data208,76,49,234,162,0,160
  28. 240 data0,185,164,192,157,0,207
  29. 250 data232,200,192,8,144,244,224
  30. 260 data128,144,238,96,8,8,8
  31. 270 data8,8,8,8,1,203,203
  32. 280 data202,201,201,200,200,200,201
  33. 290 data201,202,203,204,205,205,206
  34. 300 data206,206,205,205,204,203,202
  35. 310 data201,201,200,200,200,201,201
  36. 320 data202,203,204,205,205,206,206
  37. 330 data206,205,205,204,203,0,2
  38. 340 data206,215,192,173,215,192,240
  39. 350 data1,96,169,2,141,215,192
  40. 360 data162,0,189,1,206,157,0
  41. 370 data206,232,224,80,208,245,238
  42. 380 data214,192,173,214,192,201,41
  43. 390 data208,5,169,0,141,214,192
  44. 400 data170,189,172,192,141,78,206
  45. 410 data96,0,0,0,0,0,0
  46. 420 rem *notice the first 7 lines are *
  47. 421 rem *wriggling,while the next 5 just
  48. 422 rem *slide from left to right.
  49. 423 rem *try using this in your next prg
  50. 424 rem *and if you are just starting to
  51. 425 rem *vote,then loose one for -tide-!
  52. 426 rem*'rulers of the southern oceans'
  53.